1 REM"(C) 1989 BY WERNER W. AND FRANK K."(null)
10 POKE53280,0:POKE53281,0:S=54272:POKES+24,15:PRINT"[147]"
11 READ A:B=B+1:IFA=-1THEN100
12 PRINTCHR$(A);:POKES+8,50:POKES+7,5:POKES+11,17
13 POKES+8,0:POKES+7,0:POKES+11,0
14 GOTO11
15 DATA142,29,29,29,29,29,29,29,29,29,29,29,29,29,8,5,83,84,65,82,32,83,79,70
16 DATA84,87,65,82,69,13,159,13,29,29,29,29,29,29,29,29,29,29,29,29,29,29,29,80
17 DATA82,69,83,69,78,84,83,13,13,29,29,29,29,29,29,29,29,29,29,29,29,29
18 DATA29,29,29,150,75,78,73,70,70,69,76
19 DATA13,13,30,29,29,40,67,41,32,49,57,56,57,32,66,89,32,87,69,82,78
20 DATA69,82,32,87,46,32,65,78,68,32,70,82,65,78,75,32,75,46,13,13,129,29,29,29
21 DATA29,29,80,82,69,83,83,32,83,80,65,67,69,32,84,79,32,76,79,65,68,32,77,65
22 DATA73,78,80,65,82,84,-1
100 GETZ$:IFZ$=" "THEN102
101 GOTO100
102 READ A:B=B+1:IFA=-1THEN200
103 PRINTCHR$(A);:POKES+8,50:POKES+7,5:POKES+11,17
104 POKES+8,0:POKES+7,0:POKES+11,0
105 GOTO102
106 DATA19,13,13,13,13,13,13,13,13,13,32,32,32,32,32,32,32,32,32,32,32,32,32,32
107 DATA32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,-1
200 A$=CHR$(34):PRINT"[144]LOAD"A$"KNIFFEL"A$",8:"
201 PRINT"RUN:"
202 POKE198,0:FORA=0TO4:POKE631+A,13:NEXT:POKE198,10